BRIC Project

# clear workspace
##rm(list=ls())

getting the current WD

getwd()
[1] "/Users/Manu/Documents/GitHub/bric_ap_project"

changing the WD

setwd("/Users/Manu/Desktop/TUM_Master_Mgt_Technology/TUM_SS_21/Empirical Asset Pricing seminar/Seminar Thesis/BRIC_data")
The working directory was changed to /Users/Manu/Desktop/TUM_Master_Mgt_Technology/TUM_SS_21/Empirical Asset Pricing seminar/Seminar Thesis/BRIC_data inside a notebook chunk. The working directory will be reset when the chunk is finished running. Use the knitr root.dir option in the setup chunk to change the working directory for notebook chunks.

Loading Libraries

# loading libraries
library(data.table) # extension of the data.frame package. It is widely used for fast aggregation of large datasets, low latency add/update/remove of columns, quicker ordered joins, and a fast file reader.
library(dplyr) # data manipulation package
library(lubridate)
library(zoo) # methods for totally ordered indexed observations. It aims at performing calculations containing irregular time series of numeric vectors, matrices & factors

library(stats)

Loading in the R.data

Data column descriptions (Worldscope): https://www.professors.wi.tum.de/fileadmin/w00bca/fm/Worldscope_Data_Definition_Guide_Issue_15.pdf

# loading R.data BRIC monthly
load("/Users/Manu/Desktop/TUM_Master_Mgt_Technology/TUM_SS_21/Empirical Asset Pricing seminar/Seminar Thesis/BRIC_data/BRIC_monthly.RData")

# loading R.data BRIC monthly
load("/Users/Manu/Desktop/TUM_Master_Mgt_Technology/TUM_SS_21/Empirical Asset Pricing seminar/Seminar Thesis/BRIC_data/BRIC_static.RData")

# loading R.data BRIC monthly
load("/Users/Manu/Desktop/TUM_Master_Mgt_Technology/TUM_SS_21/Empirical Asset Pricing seminar/Seminar Thesis/BRIC_data/BRIC_yearly.RData")
str(BRIC.monthly)
Classes ‘data.table’ and 'data.frame':  5525758 obs. of  13 variables:
 $ Id     : Factor w/ 96201 levels "130022","130038",..: 17 17 17 17 17 17 17 17 17 17 ...
 $ country: chr  "BRA" "BRA" "BRA" "BRA" ...
 $ Date   : Date, format: "1979-12-31" "1980-01-31" ...
 $ MV     : num  NA NA NA NA NA NA NA NA NA NA ...
 $ MV.USD : num  NA NA NA NA NA NA NA NA NA NA ...
 $ RET    : num  NA NA NA NA NA NA NA NA NA NA ...
 $ RET.USD: num  NA NA NA NA NA NA NA NA NA NA ...
 $ PCH    : num  NA NA NA NA NA NA NA NA NA NA ...
 $ PCH.USD: num  NA NA NA NA NA NA NA NA NA NA ...
 $ UP     : num  NA NA NA NA NA NA NA NA NA NA ...
 $ NOSH   : num  NA NA NA NA NA NA NA NA NA NA ...
 $ AF     : num  NA NA NA NA NA NA NA NA NA NA ...
 $ ym     : 'yearmon' num  Dec 1979 Jan 1980 Feb 1980 Mar 1980 ...
 - attr(*, ".internal.selfref")=<externalptr> 
 - attr(*, "sorted")= chr "Id"
str(BRIC.static)
Classes ‘data.table’ and 'data.frame':  11783 obs. of  41 variables:
 $ GEOGN  : chr  "BRAZIL" "BRAZIL" "BRAZIL" "BRAZIL" ...
 $ GEOLN  : chr  "BRAZIL" "BRAZIL" "BRAZIL" "BRAZIL" ...
 $ NAME   : chr  "ACOS VILL ON DEAD - DELIST07/02/11" "CASA ANGLO ON 1000 DEAD - BRUPT.28/03/00" "CENTRAIS ELECTRICAS DE SANTA CATAR ON" "AMPLA ENERGIA E SERVICOS ON" ...
 $ ECNAME : chr  "ACOS VILLARES SA" "CASA ANGLO" "CENTRAIS ELETRICAS DE SANTA CATARINA SA" "AMPLA ENERGIA E SERVICOS SA" ...
 $ ENAME  : chr  "ACOS VILL ON DEAD - DELIST07/02/11" "CASA ANGLO ON 1000 DEAD - BRUPT.28/03/00" "CENTRAIS ELECTRICAS DE SANTA CATAR ON" "AMPLA ENERGIA E SERVICOS ON" ...
 $ PNAME  : chr  "ACOS VILL ON 1000" NA NA "AMPRA ENERG ON 1000" ...
 $ TYPE   : chr  "EQ" "EQ" "EQ" "EQ" ...
 $ MAJOR  : chr  "Y" "Y" "Y" "Y" ...
 $ ISINID : chr  "P" "P" "P" "P" ...
 $ GGISN  : chr  "BR" "BR" "BR" "BR" ...
 $ PCUR   : chr  "C" "C" "C" "C" ...
 $ EXNAME : chr  "Sao Paulo" "Sao Paulo" "Sao Paulo" "Sao Paulo" ...
 $ ESTAT  : chr  "DEAD" "DEAD" "ACT." "ACT." ...
 $ ICBSUC : int  1757 5373 7537 7535 3722 7537 2713 3355 8355 3577 ...
 $ INDG   : int  56 87 96 169 59 96 98 63 102 71 ...
 $ INDM   : chr  "Iron & Steel" "Broadline Retailers" "Alt. Electricity" "Con. Electricity" ...
 $ WC06011: int  5291 7020 8220 8220 4992 8592 1320 NA NA 4670 ...
 $ WC07021: int  3312 5311 4911 4911 3965 4911 3721 NA NA 2011 ...
 $ WC07022: int  3316 6141 4924 NA 2844 6719 4581 NA NA 2075 ...
 $ WC07023: int  6719 6021 6719 NA 3421 NA 3728 NA NA 2015 ...
 $ WC07024: int  NA NA NA NA 3561 NA 8249 NA NA NA ...
 $ WC07025: int  NA NA NA NA 3262 NA NA NA NA NA ...
 $ WC07026: int  NA NA NA NA NA NA NA NA NA NA ...
 $ WC07027: int  NA NA NA NA NA NA NA NA NA NA ...
 $ WC07028: int  NA NA NA NA NA NA NA NA NA NA ...
 $ WC07040: chr  "1757" NA "7537" "7535" ...
 $ WC07041: 'integer64' num  2.53e-314 2.64e-314 2.92e-314 2.92e-314 2.67e-314 ...
 $ ISIN   : chr  "BRAVILACNOR1" "BRCABRACNOR3" "BRCLSCACNOR6" "BRCBEEACNOR3" ...
 $ LOC    : chr  "BRAVIL3" "BRCABR3" "BRCLSC3" "BRCBEE3" ...
 $ SECD   : chr  "2006341" "2177225" "B19PKR9" "2160902" ...
 $ MNEM   : chr  "BR:AV3" "BR:CA3" "BR:CL3" "BR:CJ3" ...
 $ A4NAME : chr  NA NA NA NA ...
 $ IBTKR  : chr  "@:@7AE" NA NA "@:@7C8" ...
 $ BDATE  : Date, format: "1990-02-05" "1991-01-30" ...
 $ ESBDT  : Date, format: NA NA ...
 $ TIME   : Date, format: "2011-02-04" "1999-01-28" ...
 $ EDATE  : Date, format: NA NA ...
 $ WC18272: int  1944 1913 NA 1883 NA 19620611 19690819 NA NA NA ...
 $ WC07015: Date, format: "2011-02-07" "2000-03-30" ...
 $ Id     : chr  "130117" "130139" "130143" "130147" ...
 $ country: chr  "BRA" "BRA" "BRA" "BRA" ...
 - attr(*, ".internal.selfref")=<externalptr> 
 - attr(*, "sorted")= chr "GEOGN"
str(BRIC.yearly)
Classes ‘data.table’ and 'data.frame':  459498 obs. of  105 variables:
 $ Id     : Factor w/ 96201 levels "130022","130038",..: 17 17 17 17 17 17 17 17 17 17 ...
 $ country: chr  "BRA" "BRA" "BRA" "BRA" ...
 $ ICBSUC : int  1757 1757 1757 1757 1757 1757 1757 1757 1757 1757 ...
 $ WC07021: int  3312 3312 3312 3312 3312 3312 3312 3312 3312 3312 ...
 $ YEAR   : int  1980 1981 1982 1983 1984 1985 1986 1987 1988 1989 ...
 $ W05651 : num  NA NA NA NA NA NA NA NA NA NA ...
 $ W08006 : num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC01001: num  NA NA NA NA NA NA NA 0 0 1 ...
 $ WC01051: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC01075: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC01076: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC01084: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC01101: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC01151: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC01201: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC01230: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC01245: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC01249: Factor w/ 523677 levels "209033","220729",..: NA NA NA NA NA NA NA 932 932 3653 ...
 $ WC01250: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC01251: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC01255: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC01266: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC01271: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC01301: int  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC01401: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC01451: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC01501: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC01505: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC01551: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC01651: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC02001: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC02005: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC02051: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC02099: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC02101: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC02140: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC02201: num  NA NA NA NA NA NA NA 0 0 1 ...
 $ WC02214: int  NA NA NA NA NA NA NA NA NA NA ...
 $ WC02301: num  NA NA NA NA NA NA NA 0 0 3 ...
 $ WC02501: num  NA NA NA NA NA NA NA 0 0 2 ...
 $ WC02999: num  NA NA NA NA NA NA NA 0 0 3 ...
 $ WC03040: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC03051: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC03054: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC03060: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC03063: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC03069: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC03101: num  NA NA NA NA NA NA NA 0 0 1 ...
 $ WC03151: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC03251: num  NA NA NA NA NA NA NA 0 0 1 ...
 $ WC03255: num  NA NA NA NA NA NA NA 0 0 1 ...
 $ WC03262: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC03263: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC03351: num  NA NA NA NA NA NA NA 0 0 1 ...
 $ WC03426: num  NA NA NA NA NA NA NA 0 0 1 ...
 $ WC03451: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC03480: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC03495: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC03501: num  NA NA NA NA NA NA NA 0 0 1 ...
 $ WC03995: num  NA NA NA NA NA NA NA 0 0 1 ...
 $ WC03999: num  NA NA NA NA NA NA NA 0 0 3 ...
 $ WC04055: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC04100: int  NA NA NA NA NA NA NA NA NA NA ...
 $ WC04101: int  NA NA NA NA NA NA NA NA 0 0 ...
 $ WC04199: int  NA NA NA NA NA NA NA NA 0 0 ...
 $ WC04201: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC04251: num  NA NA NA NA NA NA NA NA 0 0 ...
 $ WC04551: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC04601: num  NA NA NA NA NA NA NA NA 0 0 ...
 $ WC04751: num  NA NA NA NA NA NA NA NA 0 0 ...
 $ WC04825: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC04826: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC04827: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC04828: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC04829: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC04830: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC04860: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC05001: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC05101: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC05202: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC05301: num  NA NA NA NA NA ...
 $ WC05350: Factor w/ 4261 levels "","29.06.1999",..: NA NA NA NA NA NA NA 336 337 140 ...
 $ WC05376: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC05401: int  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC05476: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC05491: num  NA NA NA NA NA NA NA 0 0 0 ...
 $ WC05505: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC05508: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC05651: int  NA NA NA NA NA NA NA NA NA NA ...
 $ WC05905: Factor w/ 9289 levels "","01.03.2017",..: NA NA NA NA NA NA NA NA NA NA ...
 $ WC06798: int  NA NA NA NA NA NA NA NA NA NA ...
 $ WC07011: int  NA NA NA NA NA NA NA 5115 9961 9702 ...
 $ WC07210: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC08001: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC08002: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC08004: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC08006: num  NA NA NA NA NA NA NA NA NA NA ...
 $ WC08256: num  NA NA NA NA NA ...
 $ WC08301: num  NA NA NA NA NA ...
  [list output truncated]
 - attr(*, ".internal.selfref")=<externalptr> 
 - attr(*, "sorted")= chr "Id"
head(BRIC.yearly)

TO DO’s:

# construct value-weighted market
##VWM <-merge(Data_Excursus1[,-c("Date")],
##                      BRIC.monthly,by="ym")
LS0tCnRpdGxlOiAiQlJJQ19wcm9qZWN0IgphdXRob3I6IAogIG5hbWU6IE1hbnVlbCBTY2hyZWliZXIKb3V0cHV0OgogIHBkZl9kb2N1bWVudDogZGVmYXVsdAogIGh0bWxfbm90ZWJvb2s6IGRlZmF1bHQKICBsYXRleF9lbmdpbmU6IHBkZmxhdGV4CiAgaHRtbF9kb2N1bWVudDoKICAgIHRvYzogdHJ1ZQogICAgdG9jX2Zsb2F0OiB0cnVlCiAgICB0aGVtZTogdW5pdGVkCiAgICBkZl9wcmludDogcGFnZWQKICBoZWFkZXItaW5jbHVkZXM6CiAgIC0gXHVzZXBhY2thZ2V7YW1zbWF0aH0KICAgLSBcdXNlcGFja2FnZXthbXNmb250c30KLS0tCgoqKkJSSUMgUHJvamVjdCoqCgpgYGB7cn0KIyBjbGVhciB3b3Jrc3BhY2UKIyNybShsaXN0PWxzKCkpCmBgYAoKCmdldHRpbmcgdGhlIGN1cnJlbnQgV0QKCmBgYHtyfQpnZXR3ZCgpCmBgYAoKY2hhbmdpbmcgdGhlIFdECgpgYGB7cn0Kc2V0d2QoIi9Vc2Vycy9NYW51L0Rlc2t0b3AvVFVNX01hc3Rlcl9NZ3RfVGVjaG5vbG9neS9UVU1fU1NfMjEvRW1waXJpY2FsIEFzc2V0IFByaWNpbmcgc2VtaW5hci9TZW1pbmFyIFRoZXNpcy9CUklDX2RhdGEiKQpgYGAKCiMgTG9hZGluZyBMaWJyYXJpZXMKCmBgYHtyfQojIGxvYWRpbmcgbGlicmFyaWVzCmxpYnJhcnkoZGF0YS50YWJsZSkgIyBleHRlbnNpb24gb2YgdGhlIGRhdGEuZnJhbWUgcGFja2FnZS4gSXQgaXMgd2lkZWx5IHVzZWQgZm9yIGZhc3QgYWdncmVnYXRpb24gb2YgbGFyZ2UgZGF0YXNldHMsIGxvdyBsYXRlbmN5IGFkZC91cGRhdGUvcmVtb3ZlIG9mIGNvbHVtbnMsIHF1aWNrZXIgb3JkZXJlZCBqb2lucywgYW5kIGEgZmFzdCBmaWxlIHJlYWRlci4KbGlicmFyeShkcGx5cikgIyBkYXRhIG1hbmlwdWxhdGlvbiBwYWNrYWdlCmxpYnJhcnkobHVicmlkYXRlKQpsaWJyYXJ5KHpvbykgIyBtZXRob2RzIGZvciB0b3RhbGx5IG9yZGVyZWQgaW5kZXhlZCBvYnNlcnZhdGlvbnMuIEl0IGFpbXMgYXQgcGVyZm9ybWluZyBjYWxjdWxhdGlvbnMgY29udGFpbmluZyBpcnJlZ3VsYXIgdGltZSBzZXJpZXMgb2YgbnVtZXJpYyB2ZWN0b3JzLCBtYXRyaWNlcyAmIGZhY3RvcnMKCmxpYnJhcnkoc3RhdHMpCgpgYGAKCgojIExvYWRpbmcgaW4gdGhlIFIuZGF0YQoKRGF0YSBjb2x1bW4gZGVzY3JpcHRpb25zIChXb3JsZHNjb3BlKToKaHR0cHM6Ly93d3cucHJvZmVzc29ycy53aS50dW0uZGUvZmlsZWFkbWluL3cwMGJjYS9mbS9Xb3JsZHNjb3BlX0RhdGFfRGVmaW5pdGlvbl9HdWlkZV9Jc3N1ZV8xNS5wZGYKCgpgYGB7cn0KIyBsb2FkaW5nIFIuZGF0YSBCUklDIG1vbnRobHkKbG9hZCgiL1VzZXJzL01hbnUvRGVza3RvcC9UVU1fTWFzdGVyX01ndF9UZWNobm9sb2d5L1RVTV9TU18yMS9FbXBpcmljYWwgQXNzZXQgUHJpY2luZyBzZW1pbmFyL1NlbWluYXIgVGhlc2lzL0JSSUNfZGF0YS9CUklDX21vbnRobHkuUkRhdGEiKQoKIyBsb2FkaW5nIFIuZGF0YSBCUklDIG1vbnRobHkKbG9hZCgiL1VzZXJzL01hbnUvRGVza3RvcC9UVU1fTWFzdGVyX01ndF9UZWNobm9sb2d5L1RVTV9TU18yMS9FbXBpcmljYWwgQXNzZXQgUHJpY2luZyBzZW1pbmFyL1NlbWluYXIgVGhlc2lzL0JSSUNfZGF0YS9CUklDX3N0YXRpYy5SRGF0YSIpCgojIGxvYWRpbmcgUi5kYXRhIEJSSUMgbW9udGhseQpsb2FkKCIvVXNlcnMvTWFudS9EZXNrdG9wL1RVTV9NYXN0ZXJfTWd0X1RlY2hub2xvZ3kvVFVNX1NTXzIxL0VtcGlyaWNhbCBBc3NldCBQcmljaW5nIHNlbWluYXIvU2VtaW5hciBUaGVzaXMvQlJJQ19kYXRhL0JSSUNfeWVhcmx5LlJEYXRhIikKYGBgCgpgYGB7cn0Kc3RyKEJSSUMubW9udGhseSkKYGBgCgoKCmBgYHtyfQpzdHIoQlJJQy5zdGF0aWMpCmBgYAoKYGBge3J9CnN0cihCUklDLnllYXJseSkKCmhlYWQoQlJJQy55ZWFybHkpCmBgYAoKKlRPIERPJ3MqOgoKLSBDYWxjdWxhdGUgQmVuY2htYXJrIChtYXJrZXQtY2FwIHdlaWdodGVkIGJpZyBzdG9ja3Mgb2YgdGhlIEJSSUMgcmVnaW9uKQotIENhbGN1bGF0ZSBicmVhayBwb2ludHMgb24gYmlnIHN0b2NrcwotIGRlY2lkZSBvbiBzdHJhdGVneSBhbmQgaW1wbGVtZW50IGl0Ci0gY2FsY3VsYXRlIHBvcnRmb2xpbyBjaGFyYWN0ZXJpc3RpY3MKLSB2aXN1YWxpemUgYW5kIHNob3djYXNlIHN0cmF0ZWd5IHBlcmZvcm1hbmNlCi0gcmVncmVzcyBzdHJhdGVneSBQRiBvbiBGRjVGTSBhbmQgbW9tZW50dW0gZm9yIHN0eWxlIGV4cG9zdXJlIGFuYWx5c2lzCgoKYGBge3J9CiMgY29uc3RydWN0IHZhbHVlLXdlaWdodGVkIG1hcmtldAojI1ZXTSA8LW1lcmdlKERhdGFfRXhjdXJzdXMxWywtYygiRGF0ZSIpXSwKIyMgICAgICAgICAgICAgICAgICAgICAgQlJJQy5tb250aGx5LGJ5PSJ5bSIpCgpgYGAKCg==